(define (a-plus-abs-b a b)
  ((if (> b 0) + -) a b))


; Caso b seja negativo, o valor retornado pelo if será o operador -, fazendo com que a resposta da procedure seja a - b.
; Se b é positivo, o retorno é a + b. Por isso sempre sera usado o modulo de b (já que a - b, sendo b negativo, é igual a "a + (-b)".
;
; Demonstração:
;
; 	(a-plus-abs-b 2 -3)
; 	((if (> -3 0) + -) 2 -3)
; 	(- 2 -3)
; 	5

